home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 041-050 / amok44 / m2ced / txt / msg.def < prev    next >
Text File  |  1993-11-04  |  941b  |  34 lines
  1. (**********************************************************************
  2.  
  3.     :Program.    Msg.def
  4.     :Contents.   Display any messages from M2CED
  5.     :Author.     Steffen Reith
  6.     :Address.    Hessenstr. 64, D-8700 Würzburg
  7.     :Copyright.  Shareware
  8.     :Language.   Modula-2
  9.     :Translator. M2Amiga A+L V3.2d
  10.     :Imports.    None
  11.     :History.    V1.0 15.June 1990
  12.  
  13. **********************************************************************)
  14.  
  15. DEFINITION MODULE Msg;
  16.  
  17. PROCEDURE Request(Text:ARRAY OF CHAR);
  18. (*:Input.    A normal string
  19.   :Semantic. Display a Requester ( Uses req.library ) 
  20. *)
  21.  
  22. PROCEDURE EndRequest(Text:ARRAY OF CHAR);
  23. (*:Input.    A normal string
  24.   :Semantic. Display a Requester, perform DisplayBeep and terminate Prg
  25. *)
  26.   
  27. PROCEDURE TitleMsg(Text:ARRAY OF CHAR);
  28. (*:Input.    A normal string
  29.   :Semantic. Shows the Text at the titlebar of CED
  30.   :Semantic. If CED isn't activ it will be the same as Request
  31. *)
  32.  
  33. END Msg.
  34.